VBA错误处理 |
您所在的位置：网站首页 › vba 编译错误 › VBA错误处理 |
|
在(VBScript/VBA)编程中有三种类型的错误： 语法错误运行时错误逻辑错误 语法错误语法错误(也称为解析错误)发生在VBScript的解释时间。 例如，下面一行导致语法错误，因为它缺少一个右括号。 Function ErrorHanlding_Demo() dim x,y x = "Yiibai Yiibai" y = Ucase(x End Function 运行时错误运行时错误(也称为异常)在执行期间发生，在解释之后。 例如，下面的行会导致运行时错误，因为这里的语法是正确的，但是在运行时它正在尝试调用fnmultiply，但这是一个不存在的函数。 Function ErrorHanlding_Demo1() Dim x,y x = 10 y = 20 z = fnadd(x,y) a = fnmultiply(x,y) End Function Function fnadd(x,y) fnadd = x + y End Function 逻辑错误逻辑错误可能是最难追查的错误类型。这些错误不是语法或运行时错误的结果。 相反，当您在驱动脚本的逻辑中犯了一个错误，并且没有得到预期的结果时，就会发生这种情况。 你可能无法捕捉到这些错误，因为这取决于业务需求，在程序中加入什么类型的逻辑。 例如，将一个数字除以零，或写入一个进入无限循环的脚本。 Error对象假设我们有一个运行时错误，那么通过显示错误信息来停止执行。作为开发人员，如果想捕获错误，那么使用Error对象。 例子 在下面的例子中，Err.Number给出错误号，Err.Description给出错误描述。 Err.Raise 6 ' Raise an overflow error. MsgBox "Error # " & CStr(Err.Number) & " " & Err.Description Err.Clear ' Clear the error. 错误处理VBA启用错误处理例程，也可以用来禁用错误处理例程。没有On Error语句，发生的任何运行时错误都是致命的：显示错误消息，并且执行突然停止。 On Error { GoTo [ line | 0 | -1 ] | Resume Next } 编号 关键字 描述 1 GoTo line 启用在所需的行参数中指定的行开始的错误处理例程。指定的行必须与On Error语句在相同的过程中，否则将发生编译时错误。 2 GoTo 0 禁用当前过程中启用的错误处理程序并将其重置为Nothing。 3 GoTo -1 禁用当前过程中启用的异常并将其重置为Nothing。 4 Resume Next 指定发生运行时错误时，控制权转到发生错误的语句之后的语句，并从该点继续执行。例子 Public Sub OnErrorDemo() On Error GoTo ErrorHandler ' Enable error-handling routine. Dim x, y, z As Integer x = 50 y = 0 z = x / y ' Divide by ZERO Error Raises ErrorHandler: ' Error-handling routine. Select Case Err.Number ' Evaluate error number. Case 10 ' Divide by zero error MsgBox ("You attempted to divide by zero!") Case Else MsgBox "UNKNOWN ERROR - Error# " & Err.Number & " : " & Err.Description End Select Resume Next End Sub上一篇： VBA事件 下一篇： VBA Excel对象 |
今日新闻 |
点击排行 |
|
推荐新闻 |
图片新闻 |
|
专题文章 |
| CopyRight 2018-2019 实验室设备网 版权所有 win10的实时保护怎么永久关闭 |